home *** CD-ROM | disk | FTP | other *** search
/ Carousel / CAROUSEL.cdr / mactosh / hc / firehydr.sit / Hydraulics Demo / card_13249.txt < prev    next >
Text File  |  1989-09-03  |  9KB  |  364 lines
  1. -- card: 13249 from stack: in
  2. -- bmap block id: 13507
  3. -- flags: 4000
  4. -- background id: 6979
  5. -- name: ExampleCd
  6. ----- HyperTalk script -----
  7. on closeCard
  8.  
  9.   global Zip
  10.  
  11.   if Zip is "false" then
  12.     exit closeCard
  13.   else
  14.     put "true" into Zip
  15.     set lockScreen to true
  16.     show cd field ID 1 of cd ID 13249
  17.     hide cd btn "Arrow 1" of cd ID 13249
  18.     hide cd btn "Arrow 2" of cd ID 13249
  19.     hide cd btn "Arrow 3" of cd ID 13249
  20.     hide cd btn ID 16 of cd ID 13249
  21.     hide cd field ID 8 of cd ID 13249
  22.     hide cd field ID 9 of cd ID 13249
  23.     hide cd field ID 10 of cd ID 13249
  24.     hide cd field ID 12 of cd ID 13249
  25.     put empty into cd fld ID 13 of cd ID 13249
  26.   end if
  27.  
  28. end closeCard
  29.  
  30.  
  31.  
  32.  
  33.  
  34. -- part 1 (field)
  35. -- low flags: 01
  36. -- high flags: 2007
  37. -- rect: left=26 top=185 right=317 bottom=315
  38. -- title width / last selected line: 0
  39. -- icon id / first selected line: 0 / 0
  40. -- text alignment: 0
  41. -- font id: 3
  42. -- text size: 12
  43. -- style flags: 0
  44. -- line height: 16
  45. -- part name: ExplainFd
  46.  
  47.  
  48. -- part 2 (button)
  49. -- low flags: 00
  50. -- high flags: A003
  51. -- rect: left=391 top=298 right=316 bottom=433
  52. -- title width / last selected line: 0
  53. -- icon id / first selected line: 0 / 0
  54. -- text alignment: 1
  55. -- font id: 3
  56. -- text size: 9
  57. -- style flags: 256
  58. -- line height: 12
  59. -- part name: OK
  60. ----- HyperTalk script -----
  61. on mouseUp
  62.   visual effect dissolve
  63.   go to card id 8012
  64. end mouseUp
  65.  
  66.  
  67.  
  68. -- part 3 (button)
  69. -- low flags: 00
  70. -- high flags: A003
  71. -- rect: left=342 top=240 right=258 bottom=486
  72. -- title width / last selected line: 0
  73. -- icon id / first selected line: 0 / 0
  74. -- text alignment: 1
  75. -- font id: 3
  76. -- text size: 9
  77. -- style flags: 256
  78. -- line height: 12
  79. -- part name: Friction Loss Formulas
  80. ----- HyperTalk script -----
  81. on mouseUp
  82.  
  83.   global Zip
  84.  
  85.   put "false" into Zip
  86.   show cd btn ID 3 of cd ID 7281
  87.   visual effect dissolve
  88.   go to card id 7281
  89.  
  90. end mouseUp
  91.  
  92.  
  93.  
  94.  
  95. -- part 4 (button)
  96. -- low flags: 00
  97. -- high flags: A003
  98. -- rect: left=389 top=211 right=229 bottom=435
  99. -- title width / last selected line: 0
  100. -- icon id / first selected line: 0 / 0
  101. -- text alignment: 1
  102. -- font id: 3
  103. -- text size: 9
  104. -- style flags: 256
  105. -- line height: 12
  106. -- part name: Solve 
  107. ----- HyperTalk script -----
  108. on mouseUp
  109.   set cursor to none
  110.   show cd btn ID 16 of cd ID 13249
  111.   hide cd field ID 1 of cd ID 13249
  112.   show cd field ID 13 of cd ID 13249
  113.   put "Start with the nozzle" into cd field ID 13 of cd ID 13249
  114.   repeat 1 times
  115.     set the hilite of cd btn ID 16 of cd ID 13249 to true
  116.     set the hilite of cd btn ID 16 of cd ID 13249 to false
  117.   end repeat
  118.   show cd btn "Arrow 1" of cd ID 13249
  119.   repeat for 5 times
  120.     set hilite of cd btn "Arrow 1" of cd ID 13249 to true
  121.     set hilite of cd btn "Arrow 1" of cd ID 13249 to false
  122.   end repeat
  123.   set hilite of cd btn "Arrow 1" of cd ID 13249 to false
  124.   wait 5 sec
  125.   put "The NP for a fog nozzle is 100 psi" into cd field ID 13 of cd ID 13249
  126.   repeat 1 times
  127.     set the hilite of cd btn ID 16 of cd ID 13249 to true
  128.     set the hilite of cd btn ID 16 of cd ID 13249 to false
  129.   end repeat
  130.   show cd field ID 8 of cd ID 13249
  131.   wait 5 sec
  132.   put "The FL for the 1-3/4 is 43 psi" into cd field ID 13 of cd ID 13249
  133.   repeat 1 times
  134.     set the hilite of cd btn ID 16 of cd ID 13249 to true
  135.     set the hilite of cd btn ID 16 of cd ID 13249 to false
  136.   end repeat
  137.   hide cd btn "Arrow 1" of cd ID 13249
  138.   show cd btn "Arrow 2" of cd ID 13249
  139.   repeat for 5 times
  140.     set hilite of cd btn "Arrow 2" of cd ID 13249 to true
  141.     set hilite of cd btn "Arrow 2" of cd ID 13249 to false
  142.   end repeat
  143.   set hilite of cd btn "Arrow 2" of cd ID 13249 to false
  144.   show cd field ID 9 of cd ID 13249
  145.   wait 5 sec
  146.   put "The FL for the 2-1/2 is 23 psi" into cd field ID 13 of cd ID 13249
  147.   repeat 1 times
  148.     set the hilite of cd btn ID 16 of cd ID 13249 to true
  149.     set the hilite of cd btn ID 16 of cd ID 13249 to false
  150.   end repeat
  151.   hide cd btn "Arrow 2" of cd ID 13249
  152.   show cd btn "Arrow 3" of cd ID 13249
  153.   repeat for 5 times
  154.     set Hilite of cd btn "Arrow 3" of cd ID 13249 to true
  155.     set hilite of cd btn "Arrow 3" of cd ID 13249 to false
  156.   end repeat
  157.   set hilite of cd btn "Arrow 3" of cd ID 13249 to false
  158.   show cd field ID 10 of cd ID 13249
  159.   wait 5 sec
  160.   put "The total EP is 100 +  43 + 23" into cd field ID 13 of cd ID 13249
  161.   repeat 1 times
  162.     set the hilite of cd btn ID 16 of cd ID 13249 to true
  163.     set the hilite of cd btn ID 16 of cd ID 13249 to false
  164.   end repeat
  165.   wait 5 sec
  166.   put "Total EP is 166 psi" into cd field ID 13 of cd ID 13249
  167.   repeat 1 times
  168.     set the hilite of cd btn ID 16 of cd ID 13249 to true
  169.     set the hilite of cd btn ID 16 of cd ID 13249 to false
  170.   end repeat
  171.   show cd field ID 12 of cd ID 13249
  172.   wait 5 sec
  173.   hide cd btn "Arrow 3" of cd ID 13249
  174.   hide cd field ID 13 of cd ID 13249
  175.   set cursor to hand
  176. end mouseUp
  177.  
  178.  
  179.  
  180.  
  181.  
  182. -- part 5 (button)
  183. -- low flags: 80
  184. -- high flags: 0000
  185. -- rect: left=137 top=120 right=146 bottom=172
  186. -- title width / last selected line: 0
  187. -- icon id / first selected line: 26020 / 26020
  188. -- text alignment: 1
  189. -- font id: 0
  190. -- text size: 12
  191. -- style flags: 0
  192. -- line height: 16
  193. -- part name: Arrow 3
  194.  
  195.  
  196. -- part 6 (button)
  197. -- low flags: 80
  198. -- high flags: 0000
  199. -- rect: left=264 top=107 right=133 bottom=299
  200. -- title width / last selected line: 0
  201. -- icon id / first selected line: 15279 / 15279
  202. -- text alignment: 1
  203. -- font id: 0
  204. -- text size: 12
  205. -- style flags: 0
  206. -- line height: 16
  207. -- part name: Arrow 2
  208.  
  209.  
  210. -- part 7 (button)
  211. -- low flags: 80
  212. -- high flags: 0000
  213. -- rect: left=329 top=104 right=130 bottom=364
  214. -- title width / last selected line: 0
  215. -- icon id / first selected line: 15279 / 15279
  216. -- text alignment: 1
  217. -- font id: 0
  218. -- text size: 12
  219. -- style flags: 0
  220. -- line height: 16
  221. -- part name: Arrow 1
  222.  
  223.  
  224. -- part 8 (field)
  225. -- low flags: 81
  226. -- high flags: 0000
  227. -- rect: left=53 top=175 right=196 bottom=129
  228. -- title width / last selected line: 0
  229. -- icon id / first selected line: 0 / 0
  230. -- text alignment: 0
  231. -- font id: 3
  232. -- text size: 18
  233. -- style flags: 256
  234. -- line height: 24
  235. -- part name: 100
  236.  
  237.  
  238. -- part 9 (field)
  239. -- low flags: 81
  240. -- high flags: 0000
  241. -- rect: left=53 top=195 right=216 bottom=129
  242. -- title width / last selected line: 0
  243. -- icon id / first selected line: 0 / 0
  244. -- text alignment: 0
  245. -- font id: 3
  246. -- text size: 18
  247. -- style flags: 256
  248. -- line height: 24
  249. -- part name: 43
  250.  
  251.  
  252. -- part 10 (field)
  253. -- low flags: 81
  254. -- high flags: 0000
  255. -- rect: left=54 top=215 right=240 bottom=149
  256. -- title width / last selected line: 0
  257. -- icon id / first selected line: 0 / 0
  258. -- text alignment: 0
  259. -- font id: 3
  260. -- text size: 18
  261. -- style flags: 1280
  262. -- line height: 24
  263. -- part name: 23
  264.  
  265.  
  266. -- part 12 (field)
  267. -- low flags: 81
  268. -- high flags: 0000
  269. -- rect: left=55 top=234 right=255 bottom=167
  270. -- title width / last selected line: 0
  271. -- icon id / first selected line: 0 / 0
  272. -- text alignment: 0
  273. -- font id: 3
  274. -- text size: 18
  275. -- style flags: 256
  276. -- line height: 24
  277. -- part name: 166
  278.  
  279.  
  280. -- part 13 (field)
  281. -- low flags: 81
  282. -- high flags: 0000
  283. -- rect: left=18 top=291 right=309 bottom=330
  284. -- title width / last selected line: 0
  285. -- icon id / first selected line: 0 / 0
  286. -- text alignment: 0
  287. -- font id: 3
  288. -- text size: 12
  289. -- style flags: 256
  290. -- line height: 16
  291. -- part name: PromptFd
  292.  
  293.  
  294. -- part 14 (button)
  295. -- low flags: 00
  296. -- high flags: A003
  297. -- rect: left=366 top=271 right=289 bottom=459
  298. -- title width / last selected line: 0
  299. -- icon id / first selected line: 0 / 0
  300. -- text alignment: 1
  301. -- font id: 3
  302. -- text size: 9
  303. -- style flags: 256
  304. -- line height: 12
  305. -- part name: Show Solution
  306. ----- HyperTalk script -----
  307. on mouseUp
  308.  
  309.   global Zip
  310.  
  311.   put "false" into Zip
  312.   visual effect dissolve
  313.   go to card id 14889
  314.  
  315. end mouseUp
  316.  
  317.  
  318.  
  319.  
  320. -- part 16 (button)
  321. -- low flags: 80
  322. -- high flags: 0000
  323. -- rect: left=18 top=291 right=309 bottom=314
  324. -- title width / last selected line: 0
  325. -- icon id / first selected line: 0 / 0
  326. -- text alignment: 1
  327. -- font id: 0
  328. -- text size: 12
  329. -- style flags: 0
  330. -- line height: 16
  331. -- part name: New Button
  332.  
  333.  
  334. -- part contents for card part 1
  335. ----- text -----
  336. In this problem the engine is connected to the hydrant. Your goal is to pump the correct amount of water through the 2 fog nozzles at the ends of the wyed lines.
  337.  
  338. Remember the basic equation:
  339.  
  340. EP = (NP) + (FL) +/- (BP)
  341.  
  342. The standard flow for a (1-3/4) hose line is 170 GPM.
  343.  
  344. To see friction loss formulas click on the button.
  345.  
  346.  
  347.  
  348.  
  349.  
  350. -- part contents for card part 8
  351. ----- text -----
  352.    100
  353.  
  354. -- part contents for card part 9
  355. ----- text -----
  356.      43
  357.  
  358. -- part contents for card part 10
  359. ----- text -----
  360. +   23  
  361.  
  362. -- part contents for card part 12
  363. ----- text -----
  364.    166